home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 05.zip / BS1 part 5 / EPSON_ES300C.adf / Install-EPSON_ES300C < prev    next >
Text File  |  1992-05-28  |  3KB  |  124 lines
  1. ; this routine will install the listed scanner loader into the selected directories
  2.  
  3. (set fname "EPSON_ES300C")
  4. (set dname "EPSON_ES300C")
  5.  
  6. (set todo
  7.     (askoptions
  8.         (prompt
  9.             "If you are unfamiliar with the installation process, select the Help gadget now.  "
  10.             "Otherwise, select either Proceed or Abort gadgets after "
  11.             "selecting the steps of the installation process you wish to perform."
  12.         )
  13.         (help
  14.             "This installation sequence is divided into two steps. "
  15.             "\n\n"
  16.             "In the first step, you can install the standalone Scan-To-Disk software in a directory of your "
  17.             "choosing.  If you are upgrading from a previous release of the software, choose "
  18.             "the same directory where you installed the previous version.\n\nIf you are "
  19.             "installing the software for the first time, the installation program will allow "
  20.             "you to create a new directory or install the software in an old directory. "
  21.             "\n\n"
  22.             "In the second step, you can install the Art Department Professional Loader Module compatible with this hardware device. "
  23.             "If you do not own Art Department Professional, do not select this step.  If you purchase ADPro in the "
  24.             "future and want to use the Module, simply run this installation program again, selecting only the second step."
  25.         )
  26.         (choices
  27.             "Install Scan-To-Disk Software"
  28.             "Install ADPro Loader Module"
  29.         )
  30.     )
  31. )
  32.  
  33. (if (= todo 0)
  34.     (abort "You didn't select anything, so there's nothing to do.")
  35. )
  36.  
  37. (copylib
  38.     (prompt "Copying req.library to LIBS:")
  39.     (help
  40.         "This library is required to utilize this software.  If you already have a copy of "
  41.         "this library, the library included in this install is an update to the "
  42.         "library you have currently installed.\n\n"
  43.         @copylib-help
  44.     )
  45.     (source ("%s:libs/req.library" dname))
  46.     (dest "LIBS:")
  47.     (confirm)
  48. )
  49.  
  50. (if (IN todo 0)
  51.     (
  52.         (set @default-dest
  53.             (askdir
  54.                 (prompt ("Please select directory into which you wish to install the %s Scan-To-Disk software." fname))
  55.                 (help
  56.                     @askdir-help
  57.                 )
  58.                 (default "SYS:")
  59.             )
  60.         )
  61.         (if (= 0 (exists @default-dest))
  62.             (
  63.                 (abort "You need to select a directory that exists, or use the installation program to create the directory.")
  64.             )
  65.         )
  66.         (copyfiles
  67.             (prompt "")
  68.             (help "")
  69.             (source ("%s:" dname))
  70.             (pattern ("%s_ToDisk" fname))
  71.             (dest @default-dest)
  72.             (infos)
  73.         )
  74.     )
  75.         
  76. )
  77.  
  78. (if (IN todo 1)
  79.     (
  80.         (set @default-dest
  81.             (askdir
  82.                 (prompt "Please select directory you have installed Art Department Professional into.")
  83.                 (help
  84.                     @askdir-help
  85.                 )
  86.                 (default "SYS:ADPro")
  87.             )
  88.         )
  89.  
  90.         (set adprofile (tackon @default-dest "ADPro"))
  91.         (if
  92.             (= 0 (exists adprofile))
  93.             (abort ("Could not find ADPro in directory %s." @default-dest))
  94.         )
  95.         (set adproversion (/ (getversion adprofile) 65536))
  96.  
  97.         (set copydir (tackon @default-dest "Loaders2"))
  98.         (if
  99.             (= 0 (exists copydir))
  100.             (abort "Couldn't locate the Loaders2 directory!")
  101.         )
  102.  
  103.         (if
  104.             (= adproversion 2)
  105.             (
  106.                 (copyfiles
  107.                     (prompt "")
  108.                     (help "")
  109.                     (source ("%s:Loaders2.0/%s" dname fname))
  110.                     (dest copydir)
  111.                 )
  112.             )
  113.             (
  114.                 (copyfiles
  115.                     (prompt "")
  116.                     (help "")
  117.                     (source ("%s:Loaders1.3/%s" dname fname))
  118.                     (dest copydir)
  119.                 )
  120.             )
  121.         )
  122.     )
  123. )
  124.